* net/tramp-cache.el (tramp-flush-connection-property): The hash

can be empty.

diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el
index 1bb29d1766fa9f9f675f97263e6a0499d9f57358..77aad29faa56f48756963d4a9f990c3668532a3b 100644 (file)
--- a/lisp/net/tramp-cache.el
+++ b/lisp/net/tramp-cache.el
@@ -240,10 +240,12 @@ KEY identifies the connection, it is either a process or a vector."
     (aset key 3 nil))
   (tramp-message
    key 7 "%s %s" key
-   (let (properties)
-     (maphash
-      (lambda (x y) (add-to-list 'properties x 'append))
-      (gethash key tramp-cache-data))
+   (let ((hash (gethash key tramp-cache-data))
+        properties)
+     (if (hash-table-p hash)
+        (maphash
+         (lambda (x y) (add-to-list 'properties x 'append))
+         (gethash key tramp-cache-data)))
      properties))
   (setq tramp-cache-data-changed t)
   (remhash key tramp-cache-data))